<script>on mouseUpif the textStyle of the clickChunk contains "Bold" thenspinCursorpush cdLinkToCard the clickText,"iris open"end ifend mouseUp</script>
<script>on mouseUpglobal gLastMenuLinkToCard item 1 of gLastMenu,"iris Close"end mouseUp</script>
</part>
<part>
<id>9</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>486</left>
<top>314</top>
<right>505</right>
<bottom>335</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>C Futura Condensed</font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on MouseUpglobal gOtherCdList6get doubleClick()if gOtherCdList6 = "" thenlock screengo next cd of this bgunlock screen with scroll leftelseadd 1 to line 1 of gOtherCdList6put Line (line 1 of gOtherCdList6) of gOtherCdList6 into theCdLinkToCard theCd,"scroll left"end ifEnd MouseUp</script>
</part>
<part>
<id>10</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>462</left>
<top>314</top>
<right>481</right>
<bottom>335</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>C Futura Condensed</font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<name>Prev</name>
<script>on MouseUpglobal gOtherCdList6get doubleClick()if gOtherCdList6 = "" thenlock screengo prev cd of this bgunlock screen with scroll rightelsesubtract 1 from line 1 of gOtherCdList6put Line (line 1 of gOtherCdList6) of gOtherCdList6 into theCdLinkToCard theCd,"scroll right"end ifEnd MouseUp</script>
</part>
<part>
<id>11</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>361</left>
<top>314</top>
<right>407</right>
<bottom>335</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>C Futura Condensed</font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<name>Order Form</name>
<script>on mouseUpglobal gPartIDput short id of this cd into gPartIDLinkToOrderend mouseUp</script>
</part>
<part>
<id>12</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>312</left>
<top>314</top>
<right>356</right>
<bottom>335</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>C Futura Condensed</font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<name>Order</name>
<script>on mouseUpglobal gPartID,gLastCdIDlock screenspinCursorput short id of this cd into gPartIDput short id of this cd into gLastCdIDgo cd "Order DLOG"send updateCD to this cdsend showDLOG to this cdunlock screen with zoom open fastend mouseUp</script>
<script>on MouseUpglobal gTheError,gCDVolume6SpinCursorput "" into gTheErrorput "" into theFileif fld "Files" is not "" then put gCDVolume6&item 1 of line 1 of fld "Files" into theFileput "This file is" into promptput item 7 of GetFInfo(theFile) into reqSpaceif reqSpace contains "Error" thenanswer "Unable to copy the file."& return & reqSpaceexit MouseUpend ifanswer prompt && reqSpace div 1024&"K and may take a while to copy." with "Cancel" or "Continue"go this cdif it = "Cancel" then exit MouseUpSpinCursorput removePath(theFile) into defaultask file "Save file as?" with defaultput it into thePathgo this cdif thePath = "" then exit MouseUpput char 1 to offset(":",thePath) of thePath into theVolumeput diskSpaceAvail(theVolume) into spaceAvailif gTheError is not empty thenanswer "Sorry, unable to copy file: " & return & gTheErrorput "" into gTheErrorexit mouseupend ifif spaceAvail < reqSpace*1.05 thendelete last char of theVolumebeepanswer "There is not enough space on the volume “"& theVolume &"” to copy" & return & "“" &¬fld "Title" & "”." & return & "Space required : "& reqSpace div 1024 & "K" & return &¬"Space available : " & spaceAvail div 1024 & "K" with "Cancel"exit MouseUpend ifprompt 1,"Copying File…Please wait…"SpinCursorFileCopy theFile,thePath,trueput the result into OsErrprompt 3if OsErr contains "Error" thenanswer "Sorry, unable to copy file: " & return & OsErrexit mouseupend ifSpinCursorEnd MouseUp</script>
</part>
<part>
<id>25</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>263</left>
<top>314</top>
<right>307</right>
<bottom>335</bottom>
</rect>
<style>opaque</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>10524</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Copy Hider</name>
<script></script>
</part>
<part>
<id>26</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>129</left>
<top>93</top>
<right>240</right>
<bottom>111</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>C Futura Condensed</font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<name>Strategic Allocation</name>
<script></script>
</part>
<part>
<id>27</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>364</left>
<top>221</top>
<right>403</right>
<bottom>241</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>C Futura Condensed</font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<name>SA</name>
<script></script>
</part>
<part>
<id>28</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>317</left>
<top>62</top>
<right>501</right>
<bottom>76</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Monaco</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Category</name>
<script></script>
</part>
<part>
<id>29</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>319</left>
<top>263</top>
<right>500</right>
<bottom>299</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Monaco</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Keys</name>
<script></script>
</part>
<part>
<id>30</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>317</left>
<top>79</top>
<right>501</right>
<bottom>94</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Monaco</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>SubCategory</name>
<script></script>
</part>
<part>
<id>31</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>317</left>
<top>141</top>
<right>501</right>
<bottom>181</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Helvetica</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>No Scan</name>
<script></script>
</part>
<part>
<id>32</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>364</left>
<top>240</top>
<right>431</right>
<bottom>260</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>C Futura Condensed</font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<name>No Scan</name>
<script></script>
</part>
<part>
<id>33</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>161</left>
<top>314</top>
<right>207</right>
<bottom>335</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>C Futura Condensed</font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<name>Index</name>
<script>on mouseUpLinkToIndexend mouseUp</script>
</part>
<part>
<id>36</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <true /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>317</left>
<top>97</top>
<right>441</right>
<bottom>111</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Monaco</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Type</name>
<script></script>
</part>
<part>
<id>37</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <true /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>51</left>
<top>274</top>
<right>106</right>
<bottom>288</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Monaco</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Minimum</name>
<script></script>
</part>
<part>
<id>38</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <true /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>107</left>
<top>274</top>
<right>162</right>
<bottom>288</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Monaco</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Maximum</name>
<script></script>
</part>
<part>
<id>39</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <true /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>164</left>
<top>274</top>
<right>219</right>
<bottom>288</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Monaco</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Price</name>
<script></script>
</part>
<part>
<id>40</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>364</left>
<top>202</top>
<right>443</right>
<bottom>222</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>C Futura Condensed</font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<name>Imprintable</name>
<script></script>
</part>
<part>
<id>54</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>271</left>
<top>78</top>
<right>315</right>
<bottom>114</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>5739</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New Lit</name>
<script></script>
</part>
<part>
<id>55</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>364</left>
<top>183</top>
<right>443</right>
<bottom>203</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>C Futura Condensed</font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<name>New</name>
<script></script>
</part>
<part>
<id>56</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>270</left>
<top>59</top>
<right>314</right>
<bottom>95</bottom>
</rect>
<style>opaque</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>CB Futura CondensedBold</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Obsolete</name>
<script></script>
</part>
<part>
<id>57</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>364</left>
<top>164</top>
<right>443</right>
<bottom>184</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>C Futura Condensed</font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<name>Old</name>
<script></script>
</part>
<content>
<layer>background</layer>
<id>3</id>
<text>Part Number CategoryCost</text>
</content>
<content>
<layer>background</layer>
<id>31</id>
<text>Sorry, no scan isavailable for this piece.</text>
</content>
<name>Literature</name>
<script>on arrowKey wif w = "right" then click at loc of bg btn "Next"else if w = "Left" then click at loc of bg btn "Prev"end arrowKeyon openCardglobal gOtherCdList6,gNoLaunch6,gCDVolume6spinCursorif gNoLaunch6 contains "True" thenif gNoLaunch6 contains "Volume" thenspinCursorif lineOffset(gCDVolume6,volumeList()) > 0 then put false into gNoLaunch6end ifend ifset visible of bg btn "Strategic Allocation" to hilite of bg btn "SA"get (gNoLaunch6 contains true or fld "Files" = "")set visible of bg btn "View Hider" to it-- set visible of bg btn "Print Hider" to itset visible of bg btn "Copy Hider" to itset visible of fld "No Scan" to (hilite of bg btn "No Scan")set visible of bg btn "New Lit" to (hilite of bg btn "New")set visible of bg btn "Obsolete" to (hilite of bg btn "Old")spinCursorput number of lines of gOtherCdList6 into numLinesif numLines = 0 thenhide bg btn "Next Hide"hide bg btn "Prev Hide"else if numLines ≤ 2 thenshow bg btn "Next Hide"show bg btn "Prev Hide"elseput line 1 of gOtherCdList6 into thisCdif thisCd = numLines thenshow bg btn "Next Hide"else hide bg btn "Next Hide"if thisCd = 2 thenshow bg btn "Prev Hide"else hide bg btn "Prev Hide"end ifspinCursorget line 1 of fld "Other Data"set visible of bg btn "Order Dimmed" to (it = "" or fld "Price" = "N/A")end openCardon showPres presStringglobal gTheDepths6,gAppsCD7,gAppsHD7,gCDVolume6,MFinderspinCursor--•• Split param into varsput "" into appRAMput item 1 of presString into presPathrepeat until "≈" is not in presPathput "," into char offset("≈",presPath) of presPathend repeatput item 2 of presString into whichAppput "1 8" into availDepths--•• Build Path to Presentationput gCDVolume6 before presPathif last char of presPath is "," then delete last char of presPath--•• figure out which app to launchif number of chars in whichApp ≤ 4 thenif whichApp is not "APPL" then--•• Look for user pref Applput number of lines of char 1 to offset(return&whichApp&",",return &gAppsHD7) of gAppsHD7 into tLget ""if tL is not 0 thenput line tL of gAppsHD7 into appInfoput item 2 of appInfo into aPathget FindCorrectVol(aPath,gCDVolume6)end ifif tL = 0 or it = "False" then--•• Look for it on CDget number of lines of char 1 to offset(return&whichApp&",",return &gAppsCD7) of gAppsCD7if it = 0 thenput "" into appInfoput "" into whereFoundelseput line it of gAppsCD7 into appInfoput "CD" into whereFoundend ifelseput line tL of gAppsHD7 into appInfoput "HD" into whereFoundend ifspinCursorput gCDVolume6 & item 2 of appInfo into appNameput item 3 of appInfo into appRAMelseput presPath into appNameput "" into presPathend ifelseput whichApp into appNameput gCDVolume6 before appNameend if--•• Check memoryget item 6 of presStringif it is not "" thenput it into appRAMelse--// if appRAM is empty then put something into itif "STAK" is not in whichApp and appRAM = "" thenput item 1 of APPLsize(appName,"nodialog:ErrorMessage") ¬into minMem--// assume this error is lack of SIZE resource, not fatal errorif ErrorMessage is "Could not load ‘SIZE’ resources" thenput 512 into minMemput empty into ErrorMessageend ifput minMem div 1024 into appRAMend ifend if--•• See if Application is already Openif MFinder thenspinCursorput ApplicationList() into appsOpenput RemovePath(appName) into shortAppNameif shortAppName is in appsOpen and "HyperCard" is not in shortAppName thenanswer "Sorry, the application is already open."& return &¬"“Continue” will switch to the application - from there you may use the “Open” menu item "&¬"or Quit the application and re-click the “View” button." with "Cancel" or "Continue"if it = "Continue" thenanswer "The presentation you wish to view is located in "&¬"the folder:"& return & Pathway(presPath) with "Continue"domenu shortAppNameend ifexit showPresend ifend if--•• Check memoryput (round (.95*(applMemory() div 1024))) into freeMem --// XFCNif freeMem < appRam thenbeepanswer "There is not enough memory available to view this "&¬"data sheet!" & return & "Required : "& appRAM & "K" & return &¬"Available : "&freeMem & "K"exit showPresend if--•• Offer option to view B/W or Color if appropriateif number of words of availDepths > 1 and line 3 of gTheDepths6 ≥ 8thenput 8 into reqDepthelse if line 3 of gTheDepths6 = 1 thenif first word of availDepths > line 3 of gTheDepths6 thenbeepanswer "This graphic requires a color monitor!"exit showPreselse put 1 into reqDepthelse put availDepths into reqDepth--•• Switch bit depthif number of words of reqDepth = 1 thenspinCursorif reqDepth = 1 thenput "gray" into colorTypeelse put "Color" into colorTypeSwitchXRoo reqDepth,colorTypeif word 1 of the result is "Error" thenbeepput true & return & "Monitor" into gNoLaunch6answer "Unable to switch monitor bit depths. If you wish "&¬"to view the presentation, please change the bit depth "&¬"setting (in the Control Panel) to "& quote & reqDepth &¬quote &". After setting the depth, hit the "&¬"“View” button again." with "Control Panel" or "Cancel"if it = "Control Panel" then doMenu "Control Panel"exit showPresend ifput reqDepth into line 2 of gTheDepths6end if--•• Ready to open presentationshow menuBarset cursor to 4open presPath with appNameend showPreson printPres presStringglobal gTheDepths6,gAppsCD7,gCDVolume6,MFinderspinCursor--•• Split param into varsput item 1 of presString into presPathput item 2 of presString into whichAppput item 3 of presString into availDepths--•• Build Path to Presentationput gCDVolume6 before presPathif last char of presPath is "," then delete last char of presPath--•• figure out which app to launchif number of chars in whichApp ≤ 4 thenif whichApp is not "APPL" thenspinCursorput lineItemOffset(whichApp,gAppsCD7) into lineNumput item 2 of line lineNum of gAppsCD7 into appNameput item 3 of line lineNum of gAppsCD7 into appRAMput gCDVolume6 before appNameelseput presPath into appNameput "" into presPathend ifelseput whichApp into appNameput gCDVolume6 before appNameend if--•• See if Application is already Openif MFinder thenspinCursorput ApplicationList() into appsOpenput RemovePath(appName) into shortAppNameif shortAppName is in appsOpen and¬"HyperCard" is not in shortAppName thenanswer "Sorry, the application is already open."& return &¬"“Continue” will switch to the application - "&¬"from there you may use the “Open” menu item or Quit the "&¬"application and re-click the “Print” button."¬with "Cancel" or "Continue"if it = "Continue" thenanswer "The presentation you wish to view is located in "&¬"the folder:"& return & Pathway(presPath) with "Continue"domenu shortAppNameend ifexit PrintPresend ifend if--•• Check memoryget item 6 of presStringif it is not "" then put it into appRAMput (round (.95*(applMemory() div 1024))) into freeMem --// XFCNif freeMem < appRam thenbeepanswer "There is not enough memory available to open and print this "&¬"data sheet!" & return & "Required : "& appRAM & "K" & return &¬"Available : "&freeMem & "K"exit printPresend if--•• HyperCard limit of 150 chars in paths? Should never happenput number of chars of presPath into pathCharsif pathChars ≥ 150 thenanswer "The path is too long. It has " & pathChars & " characters."exit to hyperCardend if--•• Ready to print presentationspinCursorprint presPath with appNameend printPres</script>
